home *** CD-ROM | disk | FTP | other *** search
- .key NAME,LINE,CONNECT
- .bra {
- .ket }
-
- C:FailAt 21
-
- C:Move BBS:T/LastUser.14 TO BBS:T/LastUser.15
- C:Rename BBS:T/LastUser.13 TO BBS:T/LastUser.14
- C:Rename BBS:T/LastUser.12 TO BBS:T/LastUser.13
- C:Rename BBS:T/LastUser.11 TO BBS:T/LastUser.12
- C:Rename BBS:T/LastUser.10 TO BBS:T/LastUser.11
- C:Rename BBS:T/LastUser.09 TO BBS:T/LastUser.10
- C:Rename BBS:T/LastUser.08 TO BBS:T/LastUser.09
- C:Rename BBS:T/LastUser.07 TO BBS:T/LastUser.08
- C:Rename BBS:T/LastUser.06 TO BBS:T/LastUser.07
- C:Rename BBS:T/LastUser.05 TO BBS:T/LastUser.06
- C:Rename BBS:T/LastUser.04 TO BBS:T/LastUser.05
- C:Rename BBS:T/LastUser.03 TO BBS:T/LastUser.04
- C:Rename BBS:T/LastUser.02 TO BBS:T/LastUser.03
- C:Rename BBS:T/LastUser.01 TO BBS:T/LastUser.02
- C:Rename BBS:T/LastUser.00 TO BBS:T/LastUser.01
-
- RexxC:RX 'Say( left( Date(W),8) Time() left( "{NAME}", 27) " "left( "{LINE}", 3) left( "{CONNECT}", 20)) >>BBS:T/LastUser.00
-
- C:Attach F=BBS:T/LastUser.01 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.02 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.03 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.04 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.05 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.06 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.07 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.08 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.09 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.10 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.11 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.12 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.13 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.14 T=T:LU{$$}
- C:Attach F=BBS:T/LastUser.15 T=T:LU{$$}
-
- C:Copy BBS:Texte/Header.LastUsers.txt TO BBS:Texte/Stats.LastUsers.txt
- C:Type T:LU{$$} NUMBER >>BBS:Texte/Stats.LastUsers.txt
- C:Delete T:LU{$$}
-